home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / gt_power / mailbats.zip / MAIL-CC!.BAT next >
DOS Batch File  |  1990-12-11  |  1KB  |  41 lines
  1. @Echo off
  2. @TRACE INITIATING CRASH MAIL RUN %1 //%GTPATH%\GTMAIL.LOG >NUL
  3. GTCD >NUL
  4. IF NOT "%1" == "" GOTO PARM_OK
  5. ECHO Node MUST be specified.....e.g. 032001 or 032/001
  6. ECHO Usage is CRASH 032/001
  7. GOTO EXIT
  8. :PARM_OK
  9. ECHO 
  10. ECHO  ╒═════════════════════════════════════════════════════╕ 
  11. ECHO  │               ATTEMPTING CRASH CALLS                │ 
  12. ECHO  ╘═════════════════════════════════════════════════════╛ 
  13. @TRACE .....Crashing %1 //%GTPATH%\GTMAIL.LOG >NUL
  14. CONCOPY %GTPATH%\MAIL-PCP.LOG
  15. :AGAIN
  16. ECHO CALLING MDRIV048 PCP /NOW 2459 2459 /Q:%1 /CC /IP /M2400 /B10 /ZE /R:MAIL!PCP.BBS
  17. CONCOPY %GTPATH%\MAIL-%1.LOG MDRIV047 00F2-A07C CC! /NOW 2455 2455 /Q:%1 /CC /IP /M2400 /B10 /ZC
  18. BE ASK "Do you want to crash last system again ? " yn def=n timeout=10
  19. ECHO  
  20. IF ERRORLEVEL = 2 GOTO NEXT
  21. GOTO AGAIN
  22. :NEXT
  23. SHIFT
  24. IF NOT "%1" == "" GOTO AGAIN
  25. :CALL BUZY.BAT
  26. :STOP
  27. BE ASK "Do you want distribute mail ? " yn def=y timeout=10
  28. ECHO  
  29. IF ERRORLEVEL = 2 GOTO EXIT
  30. CALL MAILDIST.BAT PCP
  31. :STOP
  32. ERROR-0
  33. CLS
  34. BE ASK "Do you want to rebag? " yn def=n timeout=10
  35. ECHO  
  36. IF ERRORLEVEL = 2 GOTO EXIT
  37. CALL MAILBAGR.BAT PCP
  38. :EXIT
  39. @TRACE .....crash calls complete %1 //%GTPATH%\GTMAIL.LOG >NUL
  40.  
  41.